/*
Copyright (C) 1996-1997 Id Software, Inc.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 3
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/
// sbar.c -- status bar code

#include "quakedef.h"


#define STAT_MINUS		10	// num frame for '-' stats digit

qpic_t		*sb_nums[2][11];
qpic_t		*sb_colon, *sb_slash;
qpic_t		*sb_ibar;
qpic_t		*sb_sbar;
qpic_t		*sb_scorebar;

qpic_t      *sb_weapons[7][8];   // 0 is active, 1 is owned, 2-5 are flashes
qpic_t      *sb_ammo[4];
qpic_t		*sb_sigil[4];
qpic_t		*sb_armor[3];
qpic_t		*sb_items[32];

qpic_t	*sb_faces[7][2];		// 0 is gibbed, 1 is dead, 2-6 are alive
								// 0 is static, 1 is temporary animation
qpic_t	*sb_face_invis;
qpic_t	*sb_face_quad;
qpic_t	*sb_face_invuln;
qpic_t	*sb_face_invis_invuln;

BOOL	sb_showscores;

qpic_t      *rsb_invbar[2];
qpic_t      *rsb_weapons[5];
qpic_t      *rsb_items[2];
qpic_t      *rsb_ammo[3];
qpic_t      *rsb_teambord;		// PGM 01/19/97 - team color border

// MED 01/04/97 added two more weapons + 3 alternates for grenade launcher
qpic_t      *hsb_weapons[7][5];   // 0 is active, 1 is owned, 2-5 are flashes
// MED 01/04/97 added array to simplify weapon parsing
int         hipweapons[4] = {HIT_LASER_CANNON_BIT, HIT_MJOLNIR_BIT, 4, HIT_PROXIMITY_GUN_BIT};
// MED 01/04/97 added hipnotic items array
qpic_t      *hsb_items[2];

void Sbar_MiniDeathmatchOverlay (void);
void Sbar_DeathmatchOverlay (void);
void M_DrawPic (int x, int y, qpic_t *pic);
void M_DrawBanner (char *name);
extern int menu_ofsy;

/*
===============
Sbar_ShowScores

Tab key down
===============
*/
void Sbar_ShowScores (void)
{
	sb_showscores = !sb_showscores;
}

/*
===============
Sbar_DontShowScores

Tab key up
===============
*/
void Sbar_DontShowScores (void)
{
}


/*
===============
Sbar_Init
===============
*/
void Sbar_InitPics (void)
{
	// load the stuff specific to a game
	int	i;

	for (i = 0; i < 10; i++)
	{
		sb_nums[0][i] = Draw_PicFromWad (va ("num_%i", i));
		sb_nums[1][i] = Draw_PicFromWad (va ("anum_%i", i));
	}

	sb_nums[0][10] = Draw_PicFromWad ("num_minus");
	sb_nums[1][10] = Draw_PicFromWad ("anum_minus");

	sb_colon = Draw_PicFromWad ("num_colon");
	sb_slash = Draw_PicFromWad ("num_slash");

	sb_weapons[0][0] = Draw_PicFromWad ("inv_shotgun");
	sb_weapons[0][1] = Draw_PicFromWad ("inv_sshotgun");
	sb_weapons[0][2] = Draw_PicFromWad ("inv_nailgun");
	sb_weapons[0][3] = Draw_PicFromWad ("inv_snailgun");
	sb_weapons[0][4] = Draw_PicFromWad ("inv_rlaunch");
	sb_weapons[0][5] = Draw_PicFromWad ("inv_srlaunch");
	sb_weapons[0][6] = Draw_PicFromWad ("inv_lightng");

	sb_weapons[1][0] = Draw_PicFromWad ("inv2_shotgun");
	sb_weapons[1][1] = Draw_PicFromWad ("inv2_sshotgun");
	sb_weapons[1][2] = Draw_PicFromWad ("inv2_nailgun");
	sb_weapons[1][3] = Draw_PicFromWad ("inv2_snailgun");
	sb_weapons[1][4] = Draw_PicFromWad ("inv2_rlaunch");
	sb_weapons[1][5] = Draw_PicFromWad ("inv2_srlaunch");
	sb_weapons[1][6] = Draw_PicFromWad ("inv2_lightng");

	for (i = 0; i < 5; i++)
	{
		sb_weapons[2 + i][0] = Draw_PicFromWad (va ("inva%i_shotgun", i + 1));
		sb_weapons[2 + i][1] = Draw_PicFromWad (va ("inva%i_sshotgun", i + 1));
		sb_weapons[2 + i][2] = Draw_PicFromWad (va ("inva%i_nailgun", i + 1));
		sb_weapons[2 + i][3] = Draw_PicFromWad (va ("inva%i_snailgun", i + 1));
		sb_weapons[2 + i][4] = Draw_PicFromWad (va ("inva%i_rlaunch", i + 1));
		sb_weapons[2 + i][5] = Draw_PicFromWad (va ("inva%i_srlaunch", i + 1));
		sb_weapons[2 + i][6] = Draw_PicFromWad (va ("inva%i_lightng", i + 1));
	}

	sb_ammo[0] = Draw_PicFromWad ("sb_shells");
	sb_ammo[1] = Draw_PicFromWad ("sb_nails");
	sb_ammo[2] = Draw_PicFromWad ("sb_rocket");
	sb_ammo[3] = Draw_PicFromWad ("sb_cells");

	sb_armor[0] = Draw_PicFromWad ("sb_armor1");
	sb_armor[1] = Draw_PicFromWad ("sb_armor2");
	sb_armor[2] = Draw_PicFromWad ("sb_armor3");

	sb_items[0] = Draw_PicFromWad ("sb_key1");
	sb_items[1] = Draw_PicFromWad ("sb_key2");
	sb_items[2] = Draw_PicFromWad ("sb_invis");
	sb_items[3] = Draw_PicFromWad ("sb_invuln");
	sb_items[4] = Draw_PicFromWad ("sb_suit");
	sb_items[5] = Draw_PicFromWad ("sb_quad");

	sb_sigil[0] = Draw_PicFromWad ("sb_sigil1");
	sb_sigil[1] = Draw_PicFromWad ("sb_sigil2");
	sb_sigil[2] = Draw_PicFromWad ("sb_sigil3");
	sb_sigil[3] = Draw_PicFromWad ("sb_sigil4");

	sb_faces[4][0] = Draw_PicFromWad ("face1");
	sb_faces[4][1] = Draw_PicFromWad ("face_p1");
	sb_faces[3][0] = Draw_PicFromWad ("face2");
	sb_faces[3][1] = Draw_PicFromWad ("face_p2");
	sb_faces[2][0] = Draw_PicFromWad ("face3");
	sb_faces[2][1] = Draw_PicFromWad ("face_p3");
	sb_faces[1][0] = Draw_PicFromWad ("face4");
	sb_faces[1][1] = Draw_PicFromWad ("face_p4");
	sb_faces[0][0] = Draw_PicFromWad ("face5");
	sb_faces[0][1] = Draw_PicFromWad ("face_p5");

	sb_face_invis = Draw_PicFromWad ("face_invis");
	sb_face_invuln = Draw_PicFromWad ("face_invul2");
	sb_face_invis_invuln = Draw_PicFromWad ("face_inv2");
	sb_face_quad = Draw_PicFromWad ("face_quad");

	sb_sbar = Draw_PicFromWad ("sbar");
	sb_ibar = Draw_PicFromWad ("ibar");
	sb_scorebar = Draw_PicFromWad ("scorebar");

	// MED 01/04/97 added new hipnotic weapons
	if (hipnotic)
	{
		hsb_weapons[0][0] = Draw_PicFromWad ("inv_laser");
		hsb_weapons[0][1] = Draw_PicFromWad ("inv_mjolnir");
		hsb_weapons[0][2] = Draw_PicFromWad ("inv_gren_prox");
		hsb_weapons[0][3] = Draw_PicFromWad ("inv_prox_gren");
		hsb_weapons[0][4] = Draw_PicFromWad ("inv_prox");

		hsb_weapons[1][0] = Draw_PicFromWad ("inv2_laser");
		hsb_weapons[1][1] = Draw_PicFromWad ("inv2_mjolnir");
		hsb_weapons[1][2] = Draw_PicFromWad ("inv2_gren_prox");
		hsb_weapons[1][3] = Draw_PicFromWad ("inv2_prox_gren");
		hsb_weapons[1][4] = Draw_PicFromWad ("inv2_prox");

		for (i = 0; i < 5; i++)
		{
			hsb_weapons[2 + i][0] = Draw_PicFromWad (va ("inva%i_laser", i + 1));
			hsb_weapons[2 + i][1] = Draw_PicFromWad (va ("inva%i_mjolnir", i + 1));
			hsb_weapons[2 + i][2] = Draw_PicFromWad (va ("inva%i_gren_prox", i + 1));
			hsb_weapons[2 + i][3] = Draw_PicFromWad (va ("inva%i_prox_gren", i + 1));
			hsb_weapons[2 + i][4] = Draw_PicFromWad (va ("inva%i_prox", i + 1));
		}

		hsb_items[0] = Draw_PicFromWad ("sb_wsuit");
		hsb_items[1] = Draw_PicFromWad ("sb_eshld");
	}

	if (rogue)
	{
		rsb_invbar[0] = Draw_PicFromWad ("r_invbar1");
		rsb_invbar[1] = Draw_PicFromWad ("r_invbar2");

		rsb_weapons[0] = Draw_PicFromWad ("r_lava");
		rsb_weapons[1] = Draw_PicFromWad ("r_superlava");
		rsb_weapons[2] = Draw_PicFromWad ("r_gren");
		rsb_weapons[3] = Draw_PicFromWad ("r_multirock");
		rsb_weapons[4] = Draw_PicFromWad ("r_plasma");

		rsb_items[0] = Draw_PicFromWad ("r_shield1");
		rsb_items[1] = Draw_PicFromWad ("r_agrav1");

		// PGM 01/19/97 - team color border
		rsb_teambord = Draw_PicFromWad ("r_teambord");
		// PGM 01/19/97 - team color border

		rsb_ammo[0] = Draw_PicFromWad ("r_ammolava");
		rsb_ammo[1] = Draw_PicFromWad ("r_ammomulti");
		rsb_ammo[2] = Draw_PicFromWad ("r_ammoplasma");
	}
}


void Sbar_Init (void)
{
	// load one-time-only stuff
	Cmd_AddCommand ("+showscores", Sbar_ShowScores);
	Cmd_AddCommand ("-showscores", Sbar_DontShowScores);
}


//=============================================================================

// drawing routines are relative to the status bar location

/*
=============
Sbar_DrawPic
=============
*/
void Sbar_DrawPic (int x, int y, qpic_t *pic)
{
	if (cl.gametype == GAME_DEATHMATCH)
		Draw_Pic (x /* + ((vid.Width - 320)>>1)*/, y + (vid.Height - SBAR_HEIGHT), pic);
	else Draw_Pic (x + ((vid.Width - 320) >> 1), y + (vid.Height - SBAR_HEIGHT), pic);
}

/*
=============
Sbar_DrawTransPic
=============
*/
void Sbar_DrawTransPic (int x, int y, qpic_t *pic)
{
	if (cl.gametype == GAME_DEATHMATCH)
		Draw_Pic (x /*+ ((vid.Width - 320)>>1)*/, y + (vid.Height - SBAR_HEIGHT), pic);
	else Draw_Pic (x + ((vid.Width - 320) >> 1), y + (vid.Height - SBAR_HEIGHT), pic);
}

/*
================
Sbar_DrawCharacter

Draws one solid graphics character
================
*/
void Sbar_DrawCharacter (int x, int y, int num)
{
	if (cl.gametype == GAME_DEATHMATCH)
		Draw_Character (x /*+ ((vid.Width - 320)>>1) */ + 4, y + vid.Height - SBAR_HEIGHT, num);
	else Draw_Character (x + ((vid.Width - 320) >> 1) + 4, y + vid.Height - SBAR_HEIGHT, num);
}

/*
================
Sbar_DrawString
================
*/
void Sbar_DrawString (int x, int y, char *str)
{
	if (cl.gametype == GAME_DEATHMATCH)
		Draw_String (x /*+ ((vid.Width - 320)>>1)*/, y + vid.Height - SBAR_HEIGHT, str);
	else Draw_String (x + ((vid.Width - 320) >> 1), y + vid.Height - SBAR_HEIGHT, str);
}

/*
=============
Sbar_itoa
=============
*/
int Sbar_itoa (int num, char *buf)
{
	int		pow10;
	int		dig;

	char *str = buf;

	if (num < 0)
	{
		*str++ = '-';
		num = -num;
	}

	for (pow10 = 10; num >= pow10; pow10 *= 10);

	do
	{
		pow10 /= 10;
		dig = num / pow10;
		*str++ = '0' + dig;
		num -= dig * pow10;
	} while (pow10 != 1);

	*str = 0;

	return str - buf;
}


/*
=============
Sbar_DrawNum
=============
*/
void Sbar_DrawNum (int x, int y, int num, int digits, int color)
{
	char			str[12];
	char			*ptr;
	int				l, frame;

	l = Sbar_itoa (num, str);
	ptr = str;
	color &= 1;

	if (l > digits) ptr += (l - digits);
	if (l < digits) x += (digits - l) * 24;

	while (*ptr)
	{
		if (*ptr == '-')
			frame = STAT_MINUS;
		else frame = *ptr - '0';

		if (frame >= 0 && frame < 11)
			Sbar_DrawTransPic (x, y, sb_nums[color][frame]);

		x += 24;
		ptr++;
	}
}

//=============================================================================

int		fragsort[MAX_SCOREBOARD];

char	scoreboardtext[MAX_SCOREBOARD][20];
int		scoreboardtop[MAX_SCOREBOARD];
int		scoreboardbottom[MAX_SCOREBOARD];
int		scoreboardcount[MAX_SCOREBOARD];
int		scoreboardlines;

/*
===============
Sbar_SortFrags
===============
*/
void Sbar_SortFrags (void)
{
	int	i, j, k;

	// sort by frags
	scoreboardlines = 0;

	for (i = 0; i < cl.maxclients; i++)
	{
		if (cl.scores[i].name[0])
		{
			fragsort[scoreboardlines] = i;
			scoreboardlines++;
		}
	}

	for (i = 0; i < scoreboardlines; i++)
	{
		for (j = 0; j < scoreboardlines - 1 - i; j++)
		{
			if (cl.scores[fragsort[j]].frags < cl.scores[fragsort[j + 1]].frags)
			{
				k = fragsort[j];
				fragsort[j] = fragsort[j + 1];
				fragsort[j + 1] = k;
			}
		}
	}
}

int	Sbar_ColorForMap (int m)
{
	return m < 128 ? m + 8 : m + 8;
}

/*
===============
Sbar_UpdateScoreboard
===============
*/
void Sbar_UpdateScoreboard (void)
{
	int	i;

	Sbar_SortFrags ();

	// draw the text
	memset (scoreboardtext, 0, sizeof (scoreboardtext));

	for (i = 0; i < scoreboardlines; i++)
	{
		int k = fragsort[i];
		scoreboard_t *s = &cl.scores[k];

		sprintf (&scoreboardtext[i][1], "%3i %s", s->frags, s->name);

		scoreboardtop[i] = Sbar_ColorForMap (s->colors & 0xf0);
		scoreboardbottom[i] = Sbar_ColorForMap ((s->colors & 15) << 4);
	}
}



/*
===============
Sbar_SoloScoreboard
===============
*/
void Sbar_SoloScoreboard (void)
{
	// some maps have none so we don't need to provide a total
	if (cl.stats[STAT_TOTALMONSTERS])
		Sbar_DrawString (8, 4, va ("Kills:   %4i/%i", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]));
	else Sbar_DrawString (8, 4, va ("Kills:   %4i", cl.stats[STAT_MONSTERS]));

	// some maps have none so we don't need to provide a total
	if (cl.stats[STAT_TOTALSECRETS])
		Sbar_DrawString (8, 12, va ("Secrets: %4i/%i", cl.stats[STAT_SECRETS], cl.stats[STAT_TOTALSECRETS]));
	else Sbar_DrawString (8, 12, va ("Secrets: %4i", cl.stats[STAT_SECRETS]));

	Sbar_DrawString (184, 4, va ("Time: %s", Q_TimeToString ((int) (cl.time + 0.5))));
	Sbar_DrawString (232 - strlen (cl.levelname) * 4, 12, cl.levelname);
}

/*
===============
Sbar_DrawScoreboard
===============
*/
void Sbar_DrawScoreboard (void)
{
	Sbar_SoloScoreboard ();

	if (cl.gametype == GAME_DEATHMATCH)
		Sbar_DeathmatchOverlay ();
}

//=============================================================================

/*
===============
Sbar_DrawInventory
===============
*/
void Sbar_DrawInventory (void)
{
	int		i;
	char	num[6];
	float	time;
	int		flashon;

	if (rogue)
	{
		if (cl.stats[STAT_ACTIVEWEAPON] >= RIT_LAVA_NAILGUN)
			Sbar_DrawPic (0, -24, rsb_invbar[0]);
		else Sbar_DrawPic (0, -24, rsb_invbar[1]);
	}
	else
	{
		Sbar_DrawPic (0, -24, sb_ibar);
	}

	// weapons
	for (i = 0; i < 7; i++)
	{
		if (cl.items & (IT_SHOTGUN << i))
		{
			time = cl.item_gettime[i];
			flashon = (int) ((cl.time - time) * 10);

			if (flashon >= 10)
			{
				if (cl.stats[STAT_ACTIVEWEAPON] == (IT_SHOTGUN << i))
					flashon = 1;
				else flashon = 0;
			}
			else flashon = (flashon % 5) + 2;

			Sbar_DrawPic (i * 24, -16, sb_weapons[flashon][i]);
		}
	}

	// MED 01/04/97
	// hipnotic weapons
	if (hipnotic)
	{
		int grenadeflashing = 0;

		for (i = 0; i < 4; i++)
		{
			if (cl.items & (1 << hipweapons[i]))
			{
				time = cl.item_gettime[hipweapons[i]];
				flashon = (int) ((cl.time - time) * 10);

				if (flashon >= 10)
				{
					if (cl.stats[STAT_ACTIVEWEAPON] == (1 << hipweapons[i]))
						flashon = 1;
					else flashon = 0;
				}
				else flashon = (flashon % 5) + 2;

				// check grenade launcher
				if (i == 2)
				{
					if (cl.items & HIT_PROXIMITY_GUN)
					{
						if (flashon)
						{
							grenadeflashing = 1;
							Sbar_DrawPic (96, -16, hsb_weapons[flashon][2]);
						}
					}
				}
				else if (i == 3)
				{
					if (cl.items & (IT_SHOTGUN << 4))
					{
						if (flashon && !grenadeflashing)
							Sbar_DrawPic (96, -16, hsb_weapons[flashon][3]);
						else if (!grenadeflashing)
							Sbar_DrawPic (96, -16, hsb_weapons[0][3]);
					}
					else Sbar_DrawPic (96, -16, hsb_weapons[flashon][4]);
				}
				else Sbar_DrawPic (176 + (i * 24), -16, hsb_weapons[flashon][i]);
			}
		}
	}

	if (rogue)
	{
		// check for powered up weapon.
		if (cl.stats[STAT_ACTIVEWEAPON] >= RIT_LAVA_NAILGUN)
		{
			for (i = 0; i < 5; i++)
			{
				if (cl.stats[STAT_ACTIVEWEAPON] == (RIT_LAVA_NAILGUN << i))
				{
					Sbar_DrawPic ((i + 2) * 24, -16, rsb_weapons[i]);
				}
			}
		}
	}

	// ammo counts
	for (i = 0; i < 4; i++)
	{
		sprintf (num, "%3i", cl.stats[STAT_SHELLS + i]);

		if (num[0] != ' ') Sbar_DrawCharacter ((6 * i + 1) * 8 - 2, -24, 18 + num[0] - '0');
		if (num[1] != ' ') Sbar_DrawCharacter ((6 * i + 2) * 8 - 2, -24, 18 + num[1] - '0');
		if (num[2] != ' ') Sbar_DrawCharacter ((6 * i + 3) * 8 - 2, -24, 18 + num[2] - '0');
	}

	flashon = 0;

	// items
	for (i = 0; i < 6; i++)
	{
		if (cl.items & (1 << (17 + i)))
		{
			time = cl.item_gettime[17 + i];

			if (time && time > cl.time - 2 && flashon)
			{
			}
			else
			{
				// MED 01/04/97 changed keys
				if (!hipnotic || (i > 1))
				{
					Sbar_DrawPic (192 + i * 16, -16, sb_items[i]);
				}
			}
		}
	}

	// MED 01/04/97 added hipnotic items
	// hipnotic items
	if (hipnotic)
	{
		for (i = 0; i < 2; i++)
		{
			if (cl.items & (1 << (24 + i)))
			{
				time = cl.item_gettime[24 + i];

				if (time && time > cl.time - 2 && flashon)
				{
				}
				else
				{
					Sbar_DrawPic (288 + i * 16, -16, hsb_items[i]);
				}
			}
		}
	}

	if (rogue)
	{
		// new rogue items
		for (i = 0; i < 2; i++)
		{
			if (cl.items & (1 << (29 + i)))
			{
				time = cl.item_gettime[29 + i];

				if (time &&	time > cl.time - 2 && flashon)
				{
				}
				else
				{
					Sbar_DrawPic (288 + i * 16, -16, rsb_items[i]);
				}
			}
		}
	}
	else
	{
		// sigils
		for (i = 0; i < 4; i++)
		{
			if (cl.items & (1 << (28 + i)))
			{
				time = cl.item_gettime[28 + i];

				if (time &&	time > cl.time - 2 && flashon)
				{
				}
				else Sbar_DrawPic (320 - 32 + i * 8, -16, sb_sigil[i]);
			}
		}
	}
}


//=============================================================================

/*
===============
Sbar_DrawFrags
===============
*/
void Sbar_DrawFrags (void)
{
	int	i, l;
	int	x, y;
	int	xofs;

	Sbar_SortFrags ();

	// draw the text
	l = scoreboardlines <= 4 ? scoreboardlines : 4;

	x = 23;

	if (cl.gametype == GAME_DEATHMATCH)
		xofs = 0;
	else xofs = (vid.Width - 320) >> 1;

	y = vid.Height - SBAR_HEIGHT - 23;

	for (i = 0; i < l; i++)
	{
		int k = fragsort[i];
		scoreboard_t *s = &cl.scores[k];

		if (!s->name[0])
			continue;

		// draw background
		Draw_Fill (xofs + x * 8 + 10, y, 28, 4, Sbar_ColorForMap (s->colors & 0xf0));
		Draw_Fill (xofs + x * 8 + 10, y + 4, 28, 3, Sbar_ColorForMap ((s->colors & 15) << 4));

		// draw number
		Sbar_DrawString ((x + 1) * 8, -24, va ("%3i", s->frags));

		if (k == cl.viewentity - 1)
		{
			Sbar_DrawCharacter (x * 8 + 2, -24, 16);
			Sbar_DrawCharacter ((x + 4) * 8 - 4, -24, 17);
		}

		x += 4;
	}
}

//=============================================================================


void Sbar_DrawArmor (void)
{
	qpic_t *armorpic = NULL;
	int armorval = 0;

	if (cl.items & IT_PENT)
	{
		armorval = 666;
		armorpic = draw_disc;
	}
	else if (rogue)
	{
		if (cl.items & RIT_ARMOR3)
			armorpic = sb_armor[2];
		else if (cl.items & RIT_ARMOR2)
			armorpic = sb_armor[1];
		else if (cl.items & RIT_ARMOR1)
			armorpic = sb_armor[0];

		armorval = cl.stats[STAT_ARMOR];
	}
	else
	{
		if (cl.items & IT_ARMOR3)
			armorpic = sb_armor[2];
		else if (cl.items & IT_ARMOR2)
			armorpic = sb_armor[1];
		else if (cl.items & IT_ARMOR1)
			armorpic = sb_armor[0];

		armorval = cl.stats[STAT_ARMOR];
	}

	if (armorpic) Sbar_DrawPic (0, 0, armorpic);
	if (armorval) Sbar_DrawNum (24, 0, armorval, 3, (armorval <= 25 || armorval == 666));
}


void Sbar_DrawFace (void)
{
	qpic_t *facepic = NULL;

	if ((cl.items & (IT_RING | IT_PENT)) == (IT_RING | IT_PENT))
		facepic = sb_face_invis_invuln;
	else if (cl.items & IT_QUAD)
		facepic = sb_face_quad;
	else if (cl.items & IT_RING)
		facepic = sb_face_invis;
	else if (cl.items & IT_PENT)
		facepic = sb_face_invuln;
	else
	{
		int anim = (cl.time <= cl.faceanimtime) ? 1 : 0;

		if (cl.stats[STAT_HEALTH] >= 100)
			facepic = sb_faces[4][anim];
		else if (cl.stats[STAT_HEALTH] < 0)
			facepic = sb_faces[0][anim];
		else facepic = sb_faces[cl.stats[STAT_HEALTH] / 20][anim];
	}

	// face only if a face pic was assigned
	if (facepic) Sbar_DrawPic (112, 0, facepic);

	// health value always
	Sbar_DrawNum (136, 0, cl.stats[STAT_HEALTH], 3, cl.stats[STAT_HEALTH] <= 25);
}


void Sbar_DrawAmmo (void)
{
	qpic_t *ammopic = NULL;

	if (rogue)
	{
		if (cl.items & RIT_SHELLS)
			ammopic = sb_ammo[0];
		else if (cl.items & RIT_NAILS)
			ammopic = sb_ammo[1];
		else if (cl.items & RIT_ROCKETS)
			ammopic = sb_ammo[2];
		else if (cl.items & RIT_CELLS)
			ammopic = sb_ammo[3];
		else if (cl.items & RIT_LAVA_NAILS)
			ammopic = rsb_ammo[0];
		else if (cl.items & RIT_PLASMA_AMMO)
			ammopic = rsb_ammo[1];
		else if (cl.items & RIT_MULTI_ROCKETS)
			ammopic = rsb_ammo[2];
	}
	else
	{
		if (cl.items & IT_SHELLS)
			ammopic = sb_ammo[0];
		else if (cl.items & IT_NAILS)
			ammopic = sb_ammo[1];
		else if (cl.items & IT_ROCKETS)
			ammopic = sb_ammo[2];
		else if (cl.items & IT_CELLS)
			ammopic = sb_ammo[3];
	}

	// ammopic only if an ammo pic was assigned
	if (ammopic) Sbar_DrawPic (224, 0, ammopic);

	// ammo number and crosshair only if there is an ammo value
	if (cl.stats[STAT_AMMO] > 0)
	{
		Sbar_DrawNum (248, 0, cl.stats[STAT_AMMO], 3, cl.stats[STAT_AMMO] <= 10);
		Draw_CrossHair ();
	}
}


/*
===============
Sbar_Draw
===============
*/
void Sbar_Draw (void)
{
	// console is full screen
	if (scr.ConCurrent == vid.Height) return;
	if (cls.state != ca_connected) return;

	if (vid.SbarLines && vid.Width > 320)
	{
		if (cl.gametype == GAME_DEATHMATCH)
			Draw_TileClear (320, vid.Height - vid.SbarLines, vid.Width - 320, vid.SbarLines);
		else
		{
			Draw_TileClear (0, vid.Height - vid.SbarLines, (vid.Width - 320) >> 1, vid.SbarLines);
			Draw_TileClear ((vid.Width + 320) >> 1, vid.Height - vid.SbarLines, (vid.Width - 320) >> 1, vid.SbarLines);
		}
	}

	if (vid.SbarLines > 24)
	{
		Sbar_DrawInventory ();

		if (cl.maxclients != 1)
			Sbar_DrawFrags ();
	}

	if (sb_showscores || cl.stats[STAT_HEALTH] <= 0)
	{
		Sbar_DrawPic (0, 0, sb_scorebar);
		Sbar_DrawScoreboard ();
	}
	else if (vid.SbarLines)
	{
		Sbar_DrawPic (0, 0, sb_sbar);

		// keys (hipnotic only)
		// MED 01/04/97 moved keys here so they would not be overwritten
		if (hipnotic)
		{
			if (cl.items & IT_KEY1) Sbar_DrawPic (209, 3, sb_items[0]);
			if (cl.items & IT_KEY2) Sbar_DrawPic (209, 12, sb_items[1]);
		}

		Sbar_DrawArmor ();
		Sbar_DrawFace ();
		Sbar_DrawAmmo ();
	}

	if (vid.Width > 320)
	{
		if (cl.gametype == GAME_DEATHMATCH)
			Sbar_MiniDeathmatchOverlay ();
	}
}

//=============================================================================

/*
==================
Sbar_DeathmatchOverlay

==================
*/
void Sbar_DeathmatchOverlay (void)
{
	int	i, l;
	int	x, y;

	M_DrawBanner ("gfx/ranking.lmp");

	// scores
	Sbar_SortFrags ();

	// draw the text
	l = scoreboardlines;

	x = 80 + ((vid.Width - 320) >> 1);
	y = 40 + menu_ofsy;

	for (i = 0; i < l; i++)
	{
		int k = fragsort[i];
		scoreboard_t *s = &cl.scores[k];

		if (!s->name[0])
			continue;

		// draw background
		Draw_Fill (x, y, 40, 4, Sbar_ColorForMap (s->colors & 0xf0));
		Draw_Fill (x, y + 4, 40, 4, Sbar_ColorForMap ((s->colors & 15) << 4));

		// draw number
		if (k == cl.viewentity - 1)
			Draw_String (x, y, va ("%c%3i%c", 16, s->frags, 17));
		else Draw_String (x, y, va ("%4i", s->frags));

		// draw name
		Draw_String (x + 64, y, s->name);

		y += 10;
	}
}

/*
==================
Sbar_DeathmatchOverlay

==================
*/
void Sbar_MiniDeathmatchOverlay (void)
{
	int				i, l;
	int				x, y;
	int				numlines;

	if (vid.Width < 512 || !vid.SbarLines)
		return;

	// scores
	Sbar_SortFrags ();

	// draw the text
	l = scoreboardlines;
	y = vid.Height - vid.SbarLines;
	numlines = vid.SbarLines / 8;

	if (numlines < 3)
		return;

	//find us
	for (i = 0; i < scoreboardlines; i++)
		if (fragsort[i] == cl.viewentity - 1)
			break;

	if (i == scoreboardlines) // we're not there
		i = 0;
	else // figure out start
		i = i - numlines / 2;

	if (i > scoreboardlines - numlines) i = scoreboardlines - numlines;
	if (i < 0) i = 0;

	x = 324;

	for (/* */; i < scoreboardlines && y < vid.Height - 8; i++)
	{
		int k = fragsort[i];
		scoreboard_t *s = &cl.scores[k];

		if (!s->name[0])
			continue;

		// draw background
		Draw_Fill (x, y + 1, 40, 3, Sbar_ColorForMap (s->colors & 0xf0));
		Draw_Fill (x, y + 4, 40, 4, Sbar_ColorForMap ((s->colors & 15) << 4));

		// draw number
		if (k == cl.viewentity - 1)
			Draw_String (x, y, va ("%c%3i%c", 16, s->frags, 17));
		else Draw_String (x, y, va ("%4i", s->frags));

		// draw name
		Draw_String (x + 48, y, s->name);

		y += 8;
	}
}


void Sbar_DrawIntermissionStat (int x, int y, char *str)
{
	int i;

	for (i = 0; ; i++)
	{
		qpic_t *pic = NULL;

		if (!str[i]) break;

		if (str[i] == '-')
			pic = sb_nums[0][STAT_MINUS];
		else if (str[i] == '/')
			pic = sb_slash;
		else if (str[i] == ':')
			pic = sb_colon;
		else
		{
			int frame = str[i] - '0';

			if (frame >= 0 && frame < 10)
				pic = sb_nums[0][frame];
			else pic = NULL;
		}

		if (!pic)
		{
			x += 24;
			continue;
		}

		Draw_Pic (x, y, pic);
		x += pic->width;
	}
}


/*
==================
Sbar_IntermissionOverlay

==================
*/
void Sbar_IntermissionOverlay (void)
{
	if (cl.gametype == GAME_DEATHMATCH)
	{
		Sbar_DeathmatchOverlay ();
		return;
	}

	Draw_Pic (64, 24, Draw_CachePic ("gfx/complete.lmp"));
	Draw_Pic (0, 56, Draw_CachePic ("gfx/inter.lmp"));

	Sbar_DrawIntermissionStat (160, 64, Q_TimeToString (cl.completed_time));

	if (cl.stats[STAT_TOTALSECRETS])
		Sbar_DrawIntermissionStat (136, 104, va ("%4i/%i", cl.stats[STAT_SECRETS], cl.stats[STAT_TOTALSECRETS]));
	else Sbar_DrawIntermissionStat (136, 104, va ("%4i", cl.stats[STAT_SECRETS]));

	if (cl.stats[STAT_TOTALMONSTERS])
		Sbar_DrawIntermissionStat (136, 144, va ("%4i/%i", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]));
	else Sbar_DrawIntermissionStat (136, 144, va ("%4i", cl.stats[STAT_MONSTERS]));
}


/*
==================
Sbar_FinaleOverlay

==================
*/
void Sbar_FinaleOverlay (void)
{
	qpic_t	*pic;

	pic = Draw_CachePic ("gfx/finale.lmp");
	Draw_Pic ((vid.Width - pic->width) / 2, 16, pic);
}

